%%% This is file `agarmt.sty', version <1.0c> 
%%% 
%%% Copyright (C) 1994 Aloysius G. Helminck. All rights reserved. 
%%% Permission is granted to to customize the declarations in this 
%%% file to serve the needs of your installation. However, no permission
%%% is granted to distribute a modified version of this file under 
%%% its original name. 
%%%
%%% This style file redefines the math symbols to: zadmtmr, zadmtmi, zadmtsy
%%% and mtex. These fonts essentially are a combination of Adobe Garamond and
%%% Mathtime fonts and are remapped to get fonts with the same
%%% character tables as the cm-math fonts. 
%%%  

\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{agarmt}[1994/04/29 Adobe Garamond + Mathtime math fonts]

% The default family is Adobe Garamond. 

\renewcommand{\rmdefault}{pad}
\def\bfdefault{sb}

% The math fonts are the zadmtm fonts.

\DeclareSymbolFont{operators}   {OT1}{zadmtt}{m}{n}
\DeclareSymbolFont{letters}     {OML}{zadmtt}{m}{it}
\DeclareSymbolFont{symbols}     {OMS}{zadmtt}{m}{n}
\DeclareSymbolFont{largesymbols}{OMX}{mtt}{m}{n}
%\DeclareSymbolFont{bold}        {OT1}{pad}{\bfdefault}{n}
%\DeclareSymbolFont{italic}      {OT1}{pad}{m}{it}
\SetMathAlphabet{\mathbf}{normal}{\encodingdefault}{\rmdefault}{\bfdefault}{n}%
\SetMathAlphabet{\mathsf}{normal}{\encodingdefault}{\sfdefault}{m}{n}%
\SetMathAlphabet{\mathrm}{normal}{\encodingdefault}{\rmdefault}{m}{n}%

% Bold math from the CM fonts.
%
%\SetSymbolFont{operators}{bold}{OT1}{crm}{bx}{n}
%\SetSymbolFont{letters}{bold}{OML}{cmm}{b}{it}
%\SetSymbolFont{symbols}{bold}{OMS}{cmsy}{b}{n}
%\SetSymbolFont{largesymbols}{bold}{OMX}{mtt}{m}{n}
%\SetMathAlphabet{\mathbf}{bold}{\encodingdefault}{\rmdefault}{m}{n}%
%\SetMathAlphabet{\mathsf}{bold}{\encodingdefault}{\sfdefault}{b}{n}%
%\SetMathAlphabet{\mathrm}{bold}{\encodingdefault}{\rmdefault}{b}{n}%
%

% Or bold math from Adobe Garamond

\SetSymbolFont{operators}{bold}{OT1}{zadmtt}{b}{n}
\SetSymbolFont{letters}{bold}{OML}{zadmtt}{b}{it}
\SetSymbolFont{symbols}{bold}{OMS}{zadmtt}{b}{n}
\SetSymbolFont{largesymbols}{bold}{OMX}{mtt}{m}{n}
\SetMathAlphabet{\mathbf}{bold}{\encodingdefault}{\rmdefault}{m}{n}%
\SetMathAlphabet{\mathsf}{bold}{\encodingdefault}{\sfdefault}{b}{n}%
\SetMathAlphabet{\mathrm}{bold}{\encodingdefault}{\rmdefault}{b}{n}%


% An \omicron command, to fill the gap.

\DeclareMathSymbol{\omicron}{0}{operators}{`\o}

% Two extra symbols from the mathtime family:

\DeclareMathSymbol{\varkappa}{0}{letters}{"80}
\DeclareMathSymbol{\comp}{2}{letters}{"81}

\def\hbar{{\mathchar'26\mkern-6.7muh}}
\def\angle{{\vbox{\ialign{$\m@th\scriptstyle##$\crcr
     \not\mathrel{\mkern14mu}\crcr
     \noalign{\nointerlineskip}
     \mkern2.5mu\leaders\hrule height.34pt\hfill\mkern2.5mu\crcr}}}}

% Reduce the space around math operators

\thinmuskip=2.5mu
\medmuskip=3.5mu plus 1mu minus 1mu
\thickmuskip=4.5mu plus 1.5mu minus 1mu

% If you do not want boldmath, then uncomment the
% following. 

% \def\boldmath{%
%    \@warning{there is no bold Symbol font}%
%    \global\let\boldmath=\relax
% }

%%
%%  \matrix can be defined similar as for AMSLaTeX:
%%
%
%\newcount\c@MaxMatrixCols
%\c@MaxMatrixCols=10
%\def\matrix{\hskip -\arraycolsep\array{*\c@MaxMatrixCols c}}
%\def\endmatrix{\endarray \hskip -\arraycolsep}
%

%%
%% If you use Textures fonts for your Roman family, then you need to
%% redefine the \AA macro for Plain and LaTeX. The macro depend on the
%% size of the box for the CM ring character to be much wider than
%% just the width of the ring. The times-roman (or other postcript)
%% character is quite small and will offset the ring far to the left. 
%% We adjust the size of the box for the ring to be placed in so that
%% it works "reasonably well" for roman, italic, and bold
%% versions. Uncomment the next two lines if you need this correction. 
%\def\AA{\leavevmode\setbox0\hbox{A}\dimen@\ht0\advance\dimen@-0.85ex%
%  \rlap{\raise.67\dimen@\hbox to \wd0{\hss\char'27\hss}}A}

\endinput


